home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 (Alt) / MACD 5.bin / workbench / docs / asm_guide / assembler course / 4.s < prev    next >
Encoding:
Text File  |  1989-08-31  |  455 b   |  31 lines
  1. ; this is the same source as 3, but without the info...
  2. ; looks better eh ?  now try to explain it yourself !!
  3.  
  4.  
  5. top:    movem.l    d0-d7/a0-a6,-(a7)
  6.  
  7.     lea.l    row1,a0
  8.     lea.l    row2,a1
  9.  
  10. loop:    cmp.l    #endrow1,a0
  11.     beq.s    endloop
  12.  
  13.     move.b    (a0)+,d0
  14.     sub.b    #$10,d0
  15.     move.b    d0,(a1)+
  16.     bra.s    loop
  17.  
  18. endloop:movem.l    (a7)+,d0-d7/a0-a6
  19.     rts
  20.  
  21.  
  22. row1:    dc.b    $20,$40,$5a,$a4,$ff,$03,$10,$40
  23.     dc.b    $64,$29,$65,$77,$b0,$ac,$00,$e2
  24. endrow1:
  25.  
  26. length=    endrow1-row1
  27.  
  28. row2:    blk.b    length,0
  29.  
  30.  
  31.